Aquí puedes escribir la descripción del mapa
Comala La razón principal para visitar este sitio es por el libro de Juan Rulfo, “Pedro Páramo” por lo que se me hace muy interesante visitar el pueblo
Guadalajara Mi interes por visitar Guadakajara es porque me gusta mucho su gastronomia, principalmente las tortas ahogadas y la carne en su jugo
Zipolite He escuchado que es una playa bastante tranquila y es relativamente virgen, por lo que me gustaria visitarla
Hermosillo Siempre me a parecido interesante la perpectiva del desierto Sonorense, ademas que me gustaria mucho visitar el Estadio Sonora, estadio local del equipo de besibol, Naranjeros de Hermosillo
Guanajuato Me llama mucho la atención asistir al Festival Cervantino que se lleva acabo en la capital de este estado
Los Cabos He escuchado que sus playas son bastante bonitas, asi como la gastronomia maritima que ofrece, por lo que me llama la atención visitarlo
También puedes poner imágenes:
Referencia uno
Referencia dos
Referencia tres
---
title: "Las aventuras de Jorge"
author: "Jorge Manuel Torres Arizmendi"
output:
flexdashboard::flex_dashboard:
orientation: rows
vertical_layout: scroll
favicon: escudo.jpg
logo: escudo.jpg
fig_mobile: TRUE
theme: cosmo
social: menu
source_code: embed
navbar:
- {title: "Las aventuras de Jorge", href: "https://rstudio.cloud/project/2897129", align: right, icon: fa-map-marker}
- {title: "INAE V, Economía UNAM", href: "http://www.economia.unam.mx/", align: right, icon: fa-school}
---
```{r global, include=FALSE}
library(leaflet)
library(leaflet.extras)
```
Mapa {data-icon="fa-map"}
=====================================
Row
-----------------------------------------------------------------------
### Título del mapa
```{r}
### Registramos la información de los lugares
lugar1 <- c(Nombre = "Comala", Giro = "cultural", longitud = -103.7, latitud = 19.3)
lugar2 <- c(Nombre = "Guadalajara", Giro = "gastronomico", longitud = -103.4, latitud = 20.7)
lugar3 <- c(Nombre = "Zipolite", Giro = "turistico", longitud = -96.5, latitud = 15.6)
lugar4 <- c(Nombre = "Hermosillo", Giro = "Turistico", longitud = -110.9, latitud = 29.08)
lugar5 <- c(Nombre = "Guanajuato", Giro = "cultural", longitud = -101.2, latitud = 21.03)
lugar6 <- c(Nombre = "Los Cabos", Giro = "turistico", longitud = -109.91, latitud = 22.88)
### Creamos una tabla de datos con la información de los lugares
lugares <- data.frame(rbind(lugar1, lugar2, lugar3, lugar4, lugar5, lugar6))
### Nos aseguramos de que la latitud y longitud sean números
lugares$longitud <- as.numeric(lugares$longitud)
lugares$latitud <- as.numeric(lugares$latitud)
### Creamos el mapa
mapa <- leaflet(lugares) %>% setView(lng = -99.3, lat = 19.4, zoom = 5) %>% addTiles() %>% addMarkers(~longitud, ~latitud, popup = paste(sep = "
", "Nombre:", lugares$Nombre, "Giro:", lugares$Giro))
### Agregamos el botón de reset y la barra de herramientas de dibujo al mapa
mapa %>% addResetMapButton() %>% addDrawToolbar(editOptions = editToolbarOptions(selectedPathOptions = selectedPathOptions()))
### Imprimimos el mapa
mapa
```
Row
-----------------------------------------------------------------------
### Descripción del mapa
Aquí puedes escribir la descripción del mapa
*Comala* **La razón principal para visitar este sitio es por el libro de Juan Rulfo, "Pedro Páramo" por lo que se me hace muy interesante visitar el pueblo**
*Guadalajara* **Mi interes por visitar Guadakajara es porque me gusta mucho su gastronomia, principalmente las tortas ahogadas y la carne en su jugo**
*Zipolite* **He escuchado que es una playa bastante tranquila y es relativamente virgen, por lo que me gustaria visitarla**
*Hermosillo* **Siempre me a parecido interesante la perpectiva del desierto Sonorense, ademas que me gustaria mucho visitar el Estadio Sonora, estadio local del equipo de besibol, Naranjeros de Hermosillo**
*Guanajuato* **Me llama mucho la atención asistir al Festival Cervantino que se lleva acabo en la capital de este estado**
*Los Cabos* **He escuchado que sus playas son bastante bonitas, asi como la gastronomia maritima que ofrece, por lo que me llama la atención visitarlo**
También puedes poner imágenes:
{heigth="150"}
[O hipervínculos, por ejemplo a Google](https://www.google.com.mx/)
Row
-----------------------------------------------------------------------
### Referencias
1. Referencia uno
2. Referencia dos
3. Referencia tres